home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / person / diskfree.zip / DISKFREE.FRM (.txt) < prev    next >
Visual Basic Form  |  1992-11-24  |  2KB  |  52 lines
  1. Form1
  2. Disk Spaces DLL Demo
  3. Form1
  4. Command1
  5. Drive1
  6. Label6
  7. Demo by John Castravet
  8. Label5
  9. Drive:
  10. Label4
  11. Label3
  12. Free Space:
  13. Label2
  14. Label1
  15. Total Space:
  16.     Form_Load
  17. DosGetDiskFree
  18. wDrive
  19.     DiskSpace
  20. DiskFree
  21. Drive1_Change
  22. bBytesCluster
  23. dBytesCluster
  24. dTemp
  25. Drive1
  26. Label2
  27. Caption
  28. Total_ClustersK
  29. Avail_Clusters
  30. Bytes_Per_Sector
  31. Sectors_Per_Cluster
  32. Drive
  33. Label4
  34. GetDiskSpaces
  35. Command1_Click
  36. Form1
  37. Label4_Click
  38. Change
  39. Drive_Change
  40. Command1_Click
  41. Drive1_Change
  42. The Total and the Available disk spaces are shown in Label2 and Label4.a
  43. If interested you can also use the Bytes Per Sector, Sectors Per Cluster,
  44. the total Disk Clusters and the available Disk Clusters.
  45. Use the Panel control found in THREED.VBX with the Flood property sett
  46. to create a bar graph type indicator..
  47. #,##0 KB
  48. #,##0 KB
  49. Disk Error
  50. Disk Error
  51. Form_Load
  52.